-module(measure_remote).

-define(SYSTEM, "ECT1 remote classes").
-define(SYSTEM_SHORT, "ect1r").

-define(CLASSES, [alpha, beta, gamma, delta, epsilon, zeta]).
-define(CLASSES2, [rw10, rw20, rw30, rw40, rw50, rw60, rw70, rw80, rw90, rw100]).
-define(CATEGORIES, [calltest, readtest, writetest]).
%-define(CATEGORIES, [calltest, readtest, writetest, {readtest2, ?CLASSES2}, {writetest2, ?CLASSES2}]).

-define(OPS100k, 10).
-include("../measure.hrl").


readtest(Obj) ->
    ectremote:get(Obj, field1).

writetest(Obj) ->
    ectremote:set(Obj, field1, 4).


readtest2(Obj) ->
    ectremote:get(Obj, f1).

writetest2(Obj) ->
    ectremote:set(Obj, f1, 4).


calltest(Obj) ->
    ectremote:query_call(Obj, method1, []).

init_object(ClassName) ->
    ectremote:new(ClassName).

dispose_object(Obj) ->
    ectremote:delete(Obj).